home *** CD-ROM | disk | FTP | other *** search
/ FM Towns: Free Software Collection 6 / FM Towns Free Software Collection 6.iso / t_os / vdtwn / tvf / asmhd6 / tw1hd6 / mono.hd6 < prev    next >
Text File  |  1993-07-08  |  1KB  |  80 lines
  1. ds_name        db    '\KOMEI\実物\tvf_prg\MONO',0
  2.  
  3.  
  4. paint_wd:
  5.      SET_P dt1
  6.      WD_LEFT
  7. re_paint:
  8. mouse_in:
  9.      ret
  10. be_called:
  11.  
  12.  
  13.  
  14. ;===== monotone screen =====    ; 処理が手抜きでゴメンナサイ(^_^;)
  15.  
  16. monotone:
  17.              CALL_P dt1     ;call    screen_side_clear
  18.  
  19.      push ebp
  20.      push ds
  21.      push es
  22.      mov ax,1ch
  23.      mov ds,ax
  24.      mov es,ax
  25.  
  26.  
  27.         align    4
  28. #monotone:    mov    ebp,01111100000000000111110000000000b
  29.         align    4
  30. #monotone_:    mov    cx,240*100h+5
  31.         mov    edx,400h-(360*2-24)
  32.         mov    esi,20
  33.         mov    edi,40000h+20
  34.         align    4
  35. #mn_rep0:
  36.         REPT    (360-12)*2/4    ;ここが高速化のポイントだ！
  37.         lodsd
  38.         and    eax,ebp
  39.         mov    ebx,eax
  40.         shr    eax,cl
  41.         xor    eax,ebx
  42.         shr    eax,cl
  43.         xor    eax,ebx
  44.         stosd
  45.         ENDM
  46.         add    esi,edx
  47.         add    edi,edx
  48.         dec    ch
  49.         jne    #mn_rep0
  50.         mov    ax,0901h
  51.         int    90h
  52.         xor    dh,0FFh
  53.         je    #monotone_
  54.  
  55.      pop es
  56.      pop ds
  57.      pop ebp
  58.      ret
  59.  
  60.  
  61.  
  62. dt1:
  63.      call sub_edi
  64.      dw ?
  65.      db 'S_S_CLS',0
  66.  
  67. look_me:
  68.      call sub_esi
  69.      dd 0,0
  70.      dw     1,0,180,42,200,390,15,1,0,0
  71.  
  72.  
  73. p_call:
  74.      M_P_CALL
  75. p_set:
  76.      M_P_SET
  77.  
  78.  
  79.  
  80.